'   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '           N a m e : 	 W X M _ 2 D i g i C l a m p _ J A K A _ 2 . t x t                                 D a t e :   2 6   J a n   2 0 2 
 
 '         A u t o r :   L e o n a r d o   D E   P A L O   P h . D . 
 
 
 
 '         S c o p e : M a n a g e   t w o   D i g i C l a m p 
 
 ' 
 
 '   H a r d w a r e :   S t a n d a r d   T h e r e m i n o   M a s t e r   a n d   t w o   C u r r e n t   S e n s o r 
 
 '         M o t o r :   F e e T e c h   F T 8 4 6 B L 
 
 ' 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 ' L o a d   i m a g e s \ D i g i C l a m p U R . j p g 
 
 ' L o a d   s o u n d \ g o n g . w a v 
 
 O p t i o n   S p e e d   9 
 
 G o s u b   R e l e a s e _ 1 
 
 G o s u b   R e l e a s e _ 2 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S o f t w a r e   l i m i t s 
 
 C l a m p M a x M 1   =     8 4 0 
 
 C l a m p M i n M 1   =     3 6 0 
 
 C l a m p M a x M 2   =     8 4 0 
 
 C l a m p M i n M 2   =     3 6 0 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   S l o t s 
 
 S l o t _ D i g i C l a m p M 1             =   1 0 1 
 
 S l o t _ C l a m p M 1 C o m m a n d       =   1 0 3 
 
 S l o t _ D i g i C l a m p M 2             =   2 0 1 
 
 S l o t _ C l a m p M 2 C o m m a n d       =   2 0 3 
 
 
 
 S l o t _ R e d       =   7 
 
 S l o t _ G r e e n   =   8 
 
 S l o t _ B l u e     =   9 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   B U T T O N S 
 
 B u t t o n     1   T e x t     C L A M P _ 1 
 
 B u t t o n     1   C o l o r   Y e l l o w 
 
 
 
 B u t t o n     4   T e x t     S e l f C l a m p 
 
 B u t t o n     4   C o l o r   L i g h t C y a n 
 
 B u t t o n     7   T e x t     W H I T E 
 
 B u t t o n     7   C o l o r   W h i t e 
 
 B u t t o n     8   T e x t     R E D 
 
 B u t t o n     8   C o l o r   R e d 
 
 B u t t o n     9   T e x t     G R E E N 
 
 B u t t o n     9   C o l o r   G r e e n 
 
 B u t t o n   1 0   T e x t     B L U E 
 
 B u t t o n   1 0   C o l o r   B l u e 
 
 B u t t o n   1 1   T e x t     B L A C K 
 
 B u t t o n   1 1   C o l o r   B l a c k 
 
 
 
 B u t t o n   1 4   T e x t     C L O S E   A L L 
 
 B u t t o n   1 4   C o l o r   R e d 
 
 
 
 B u t t o n   1 7   T e x t     C L A M P _ 2 
 
 B u t t o n   1 7   C o l o r   Y e l l o w 
 
 
 
 G o s u b   D i s a b l e A l l B u t t o n s 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   K E Y S 
 
 K e y J o g _ S p e e d   =   1 0 0 0 
 
 K e y   R i g h t 	 	 G o s u b   E x e c K e y s 
 
 K e y   L e f t   	 	 G o s u b   E x e c K e y s 
 
 K e y   U p   	 	 	 G o s u b   E x e c K e y s 
 
 K e y   D o w n   	 	 G o s u b   E x e c K e y s 
 
 K e y   P a g e u p 	 	 G o s u b   E x e c K e y s 
 
 K e y   P a g e d o w n 	 G o s u b   E x e c K e y s 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   L O A D   E X T E R N A L   P R O G R A M S 
 
 L o a d   " T h e r e m i n o _ H A L \ T h e r e m i n o _ H A L . e x e " 
 
 ' L o a d   " M i c r o v i d e o \ T h e r e m i n o _ M i c r o V i d e o . e x e " 
 
 L o a d   " T h e r e m i n o _ H A L \ T h e r e m i n o _ S l o t V i e w e r . e x e " 
 
 ' L o a d   " T h e r e m i n o _ H A L \ T h e r e m i n o _ S i g n a l S c o p e . e x e " 
 
 L o a d   " D i g i C l a m p M 1 \ R o b o C l a m p . e x e " 
 
 L o a d   " D i g i C l a m p M 2 \ R o b o C l a m p . e x e " 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   T E S T   M A S T E R   P R E S E N T 
 
 F o r   v 1   =   1   T o   9 e 9 9 
 
 	 F o r   v 2   =   1   T o   2 0   '   < < <   t e s t i n g   f o r   2   s e c o n d s 
 
 	 	 I f   ( S l o t ( 0 )   > =   1   A n d   S l o t ( 0 )   < =   2 )   O r   K e y ( " C T R L " ) 
 
 	 	 	 E x i t   2 
 
 	 	 E n d I f 
 
 	 	 W a i t   S e c o n d s   0 . 1 
 
 	 N e x t 
 
 	 P r i n t   "   I n v a l i d   m a s t e r   n u m b e r :   "   +   S l o t ( 0 ) 
 
 	 S l o t   0   =   R e c o g n i z e 
 
 	 W i n d o w   S e t F o c u s 
 
 	 B e e p 
 
 N e x t 
 
 P r i n t   " " 
 
 
 
 G o s u b   E n a b l e A l l B u t t o n s 
 
 W a i t   S e c o n d s   0 . 5 
 
 L o a d   H i d e 
 
 
 
 S t o p 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 ' 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     V A R I A B L E S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 V a r i a b l e   N u m e r i c   S l o t _ D i g i C l a m p M 1 
 
 V a r i a b l e   N u m e r i c   S l o t _ C l a m p M 1 C o m m a n d 
 
 V a r i a b l e   N u m e r i c   S l o t _ D i g i C l a m p M 2 
 
 V a r i a b l e   N u m e r i c   S l o t _ C l a m p M 2 C o m m a n d 
 
 
 
 V a r i a b l e   N u m e r i c   C l a m p M a x M 1 
 
 V a r i a b l e   N u m e r i c   C l a m p M i n M 1 
 
 V a r i a b l e   N u m e r i c   C l a m p M a x M 2 
 
 V a r i a b l e   N u m e r i c   C l a m p M i n M 2 
 
 
 
 V a r i a b l e   N u m e r i c   S l o t _ R e d 
 
 V a r i a b l e   N u m e r i c   S l o t _ G r e e n 
 
 V a r i a b l e   N u m e r i c   S l o t _ B l u e 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     C L O S I N G   E V E N T S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   C L O S E   A L L 
 
 	 L o a d   C l o s e A p p s 
 
 R e t u r n 
 
 
 
 L a b e l   E v e n t S t o p 
 
 	 G o s u b   E n a b l e A l l B u t t o n s 
 
 E n d 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '   E N A B L E / D I S A B L E   B U T T O N S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   E n a b l e A l l B u t t o n s 
 
 	 F o r   v 1   =   1   T o   3 2 
 
 	 	 B u t t o n   v 1   E n a b l e d 
 
 	 N e x t 
 
 R e t u r n 
 
 
 
 L a b e l   D i s a b l e A l l B u t t o n s 
 
 	 F o r   v 1   =   1   T o   3 2 
 
 	 	 B u t t o n   v 1   D i s a b l e d 
 
 	 N e x t 
 
 R e t u r n 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '   L E D   C O L O R S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   W H I T E 
 
 	 S l o t   ( S l o t _ R e d )       =   1 0 0 0 
 
 	 S l o t   ( S l o t _ G r e e n )   =   1 0 0 0 
 
 	 S l o t   ( S l o t _ B l u e )     =   1 0 0 0 
 
 R e t u r n 
 
 
 
 L a b e l   R E D 
 
 	 S l o t   ( S l o t _ R e d )       =   1 0 0 0 
 
 	 S l o t   ( S l o t _ G r e e n )   =   0 
 
 	 S l o t   ( S l o t _ B l u e )     =   0 
 
 R e t u r n 
 
 
 
 L a b e l   G R E E N 
 
 	 S l o t   ( S l o t _ R e d )       =   0 
 
 	 S l o t   ( S l o t _ G r e e n )   =   1 0 0 0 
 
 	 S l o t   ( S l o t _ B l u e )     =   0 
 
 R e t u r n 
 
 
 
 L a b e l   B L U E 
 
 	 S l o t   ( S l o t _ R e d )       =   0 
 
 	 S l o t   ( S l o t _ G r e e n )   =   0 
 
 	 S l o t   ( S l o t _ B l u e )     =   1 0 0 0 
 
 R e t u r n 
 
 
 
 L a b e l   B L A C K 
 
 	 S l o t   ( S l o t _ R e d )       =   0 
 
 	 S l o t   ( S l o t _ G r e e n )   =   0 
 
 	 S l o t   ( S l o t _ B l u e )     =   0 
 
 R e t u r n 
 
 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     S E Q U E N C E S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   S e l f C l a m p 
 
 	 B u t t o n   4   C o l o r   F l a s h i n g 8   Y e l l o w   G r e e n 
 
 	 F o r   v 9   =   1   T o   2 0 0 0 	 	 ' 9 e 9 9 
 
 	 	 S e q u e n c e F i l e N a m e   =   " S E Q U E N C E S \ D e m o C l a m p . s e q " 
 
 	 	 G o s u b   E x e c S e q u e n c e 
 
 	 N e x t 
 
 	 B u t t o n   4   C o l o r   L i g h t C y a n 
 
 R e t u r n 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     S E Q U E N C E   L O A D I N G   A N D   E X E C U T I O N 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 V a r i a b l e   S t r i n g   S e q u e n c e F i l e N a m e 
 
 V a r i a b l e   S t r i n g   S e q u e n c e 
 
 V a r i a b l e   S t r i n g   S e q u e n c e C m d 
 
 V a r i a b l e   N u m e r i c   S e q u e n c e I n d e x 
 
 V a r i a b l e   N u m e r i c   S e q u e n c e L e n g t h 
 
 
 
 L a b e l   E x e c S e q u e n c e 
 
 	 L o a d   S e q u e n c e   S e q u e n c e F i l e N a m e 
 
 	 I f   L e n ( S e q u e n c e )   =   0 
 
 	 	 C o n t r o l s   O p e n T e x t B o x 
 
 	 	 P r i n t   C R L F   +   "   S e q u e n c e   f i l e   n o t   f o u n d :   "   +   S e q u e n c e F i l e N a m e 
 
 	 	 B e e p 
 
 	 	 S t o p 
 
 	 E n d I f 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 V a r i a b l e   N u m e r i c   E x e c S e q u e n c e S t a r t T i m e 
 
 	 E x e c S e q u e n c e S t a r t T i m e   =   E l a p s e d T i m e 
 
 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 S e q u e n c e L e n g t h   =   G e t S e p a r a t e d S t r i n g C o u n t ( S e q u e n c e ,   C R L F ) 
 
 	 F o r   S e q u e n c e I n d e x   =   0   T o   S e q u e n c e L e n g t h - 1 
 
 	 	 S e q u e n c e C m d   =   G e t S e p a r a t e d S t r i n g ( S e q u e n c e ,   S e q u e n c e I n d e x ,   C R L F ) 
 
 	 	 S e q u e n c e C m d   =   R e p l a c e ( S e q u e n c e C m d ,   C h r ( 9 ) ,   "   " )   ' T A B S   t o   S P A C E S 
 
 	 	 S e q u e n c e C m d   =   R e m o v e C o m m e n t s ( S e q u e n c e C m d ) 
 
 	 	 S e q u e n c e C m d   =   T r i m ( S e q u e n c e C m d ) 
 
 	 	 ' 
 
 	 	 P r i n t   "   E x e c u t i n g   c o m m a n d :   "   +   S e q u e n c e C m d 
 
 	 	 ' 
 
 	 	 S e l e c t   U C a s e ( S e q u e n c e C m d ) 
 
                         '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   E n d   s e q u e n c e 
 
 	 	 	 C a s e   " E N D S E Q " 
 
 	 	 	 	 E x i t 
 
 	 	         '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   A C T I O N S 
 
 	 	 	 C a s e   " W A I T A L L M O T O R S " 
 
 	 	 	 	 ' G o s u b   W a i t A l l M o t o r 
 
 	 	 	 C a s e   " C L O S E   A L L " 
 
 	 	 	 	 G o s u b   C L O S E   A L L 
 
 	 	 	 C a s e   " S l o t _ D i g i C l a m p M 1 " 
 
 	 	 	 	 G o s u b   C L A M P _ 1 
 
 	 	 	 C a s e   " R E L E A S E M 1 " 
 
 	 	 	 	 G o s u b   R e l e a s e _ 1 
 
 	 	 	 C a s e   " C L A M P M 2 " 
 
 	 	 	 	 G o s u b   C L A M P _ 2 
 
 	 	 	 C a s e   " R E L E A S E M 2 " 
 
 	 	 	 	 G o s u b   R e l e a s e _ 2 
 
 	 	 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   L E D   C O L O R S 
 
 	 	 	 ' C a s e   " R E D O N " 
 
 	 	 	 ' 	 G o s u b   R e d O n 
 
 	 	 	 ' C a s e   " G R E E N O N " 
 
 	 	 	 ' 	 G o s u b   G r e e n O n 
 
 	 	 	 ' C a s e   " B L U O N " 
 
 	 	 	 ' 	 G o s u b   B l u O N 
 
 	 	 	 ' C a s e   " Y E L L O W O N " 
 
 	 	 	 ' 	 G o s u b   Y e l l o w O n 
 
 	 	 	 ' C a s e   " W H I T E O N " 
 
 	 	 	 ' 	 G o s u b   W h i t e O n 
 
 	 	 	 ' C a s e   " R G B O F F " 
 
 	 	 	 ' 	 G o s u b   R g b O f f 
 
 	 	 	 ' C a s e   " W H I T E F R O N T O N " 
 
 	 	 	 ' 	 G o s u b   W h i t e F r o n t O n 
 
 	 	 	 ' C a s e   " W H I T E F R O N T O F F " 
 
 	 	 	 ' 	 G o s u b   W h i t e F r o n t O F F 
 
 	 	 	 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   V I D E O 
 
 	 	 	 ' C a s e   " S T A R T V I D E O " 
 
 	 	 	 ' 	 G o s u b   S t a r t V i d e o 
 
 	 	 	 ' C a s e   " S T O P V I D E O " 
 
 	 	 	 ' 	 G o s u b   S t o p V i d e o 
 
 	 	 	 ' C a s e   " S A V E V I D E O " 
 
 	 	 	 ' 	 G o s u b   S a v e V i d e o 
 
 	 	 	 ' C a s e   " T A K E I M A G E " 
 
 	 	 	 ' 	 G o s u b   T a k e I m a g e 
 
                         '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   W i t h   p a r a m e t e r s 
 
 	 	 	 C a s e E l s e 
 
 	 	 	 	 s 1   =   G e t S e p a r a t e d S t r i n g ( S e q u e n c e C m d ,   0 ) 
 
 	 	 	 	 S e l e c t   U C a s e ( s 1 ) 
 
 	 	 	 	 	 C a s e   " P A U S E " 
 
 	 	 	 	 	 	 ' G o s u b   R e d O n 
 
 	 	 	 	 	 	 W a i t   S e c o n d s   G e t S e p a r a t e d S t r i n g ( S e q u e n c e C m d ,   1 ) 
 
 	 	 	 	 	 	 ' G o s u b   G r e e n O n 
 
 	 	 	 	 	 C a s e   " D I S P E N S E R " 
 
 	 	 	 	 	 	 ' D i s p e n s e r T i m e   =   G e t S e p a r a t e d S t r i n g ( S e q u e n c e C m d ,   1 ) 
 
 	 	 	 	 	 	 ' G o s u b   D i s p e n s e r 
 
 	 	 	 	 	 C a s e E l s e 
 
 	 	 	 	 	 	 I f   s 1   < >   " " 
 
 	 	 	 	 	 	 	 C o n t r o l s   O p e n T e x t B o x 
 
 	 	 	 	 	 	 	 P r i n t   C R L F   +   "   U n r e c o g n i z e d   c o m m a n d :   "   +   S e q u e n c e C m d 
 
 	 	 	 	 	 	 	 B e e p 
 
 	 	 	 	 	 	 	 S t o p 
 
 	 	 	 	 	 	 E n d I f 
 
 	 	 	 	 E n d S e l e c t 
 
 	 	 E n d S e l e c t 
 
 	 N e x t 
 
 	 S e q u e n c e F i l e N a m e   =   R e p l a c e ( S e q u e n c e F i l e N a m e , " . s e q " , " " ) 
 
 	 P r i n t   S e q u e n c e F i l e N a m e   +   "   e x e c u t e d   i n   "   +   F o r m a t ( E l a p s e d T i m e   -   E x e c S e q u e n c e S t a r t T i m e ,   " 0 . 0 0 " )   +   "   s e c o n d s " 
 
 R e t u r n 
 
 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     F U N C T I O N S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   C L A M P _ 1 
 
 	 S l o t   ( S l o t _ C l a m p M 1 C o m m a n d )   =   1 0 0 0 
 
 	 B u t t o n   1   T e x t   " R e l e a s e   1 " 
 
 	 B u t t o n   1   C o l o r   F l a s h i n g 7   O r a n g e   Y e l l o w 
 
 R e t u r n 
 
 
 
 L a b e l   R e l e a s e _ 1 
 
 	 S l o t   ( S l o t _ C l a m p M 1 C o m m a n d )   =   0 
 
 	 B u t t o n   1   C o l o r   Y e l l o w 
 
 	 B u t t o n   1   T e x t   C L A M P _ 1 
 
 R e t u r n 
 
 
 
 L a b e l   C L A M P _ 2 
 
 	 S l o t   ( S l o t _ C l a m p M 2 C o m m a n d )   =   1 0 0 0 
 
 	 B u t t o n   1 7   T e x t   R e l e a s e _ 2 
 
 	 B u t t o n   1 7   C o l o r   F l a s h i n g 7   O r a n g e   Y e l l o w 
 
 R e t u r n 
 
 
 
 L a b e l   R e l e a s e _ 2 
 
 	 S l o t   ( S l o t _ C l a m p M 2 C o m m a n d )   =   0 
 
 	 B u t t o n   1 7   C o l o r   Y e l l o w 
 
 	 B u t t o n   1 7   T e x t   C L A M P _ 2 
 
 R e t u r n 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     J O G   w i t h   k e y b o a r d 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   E x e c K e y s 
 
 	 V a r i a b l e   N u m e r i c   K e y J o g _ S p e e d 
 
 	 V a r i a b l e   N u m e r i c   J o g S p e e d 
 
 	 J o g S p e e d   =   K e y J o g _ S p e e d   /   1 0 0 
 
 	 S e l e c t   T r u e 
 
 	 	 C a s e   K e y ( " S H I F T " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 1 
 
 	 	 C a s e   K e y ( " C T R L " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 1 
 
 	 	 C a s e   K e y ( " A L T " ) 
 
 	 	 	 J o g S p e e d   =   J o g S p e e d   *   0 . 0 0 1 
 
 	 E n d S e l e c t 
 
 	 ' 
 
 	 I f   K e y ( " R i g h t " ) 
 
 	 	 S l o t   S l o t _ D i g i C l a m p M 1   =   L i m i t ( S l o t ( S l o t _ D i g i C l a m p M 1 )   +   J o g S p e e d ,   C l a m p M i n M 1 ,   C l a m p M a x M 1 ) 
 
 	 E n d I f 
 
 	 I f   K e y ( " L e f t " ) 
 
 	 	 S l o t   S l o t _ D i g i C l a m p M 1   =   L i m i t ( S l o t ( S l o t _ D i g i C l a m p M 1 )   -   J o g S p e e d ,   C l a m p M i n M 1 ,   C l a m p M a x M 1 ) 
 
 	 E n d I f 
 
 	 ' 
 
 	 I f   K e y ( " U p " ) 
 
 	 	 S l o t   S l o t _ D i g i C l a m p M 2   =   L i m i t ( S l o t ( S l o t _ D i g i C l a m p M 2 )   +   J o g S p e e d ,   C l a m p M i n M 2 ,   C l a m p M a x M 2 ) 
 
 	 E n d I f 
 
 	 I f   K e y ( " D o w n " ) 
 
 	 	 S l o t   S l o t _ D i g i C l a m p M 2   =   L i m i t ( S l o t ( S l o t _ D i g i C l a m p M 2 )   -   J o g S p e e d ,   C l a m p M i n M 2 ,   C l a m p M a x M 2 ) 
 
 	 E n d I f 
 
 	 ' 
 
 	 ' I f   K e y ( " P a g e U p " ) 
 
 	 ' 	 S l o t   S l o t _ Z   =   L i m i t ( S l o t ( S l o t _ Z )   +   J o g S p e e d ,   Z m i n ,   Z m a x ) 
 
 	 ' E n d I f 
 
 	 ' I f   K e y ( " P a g e D o w n " ) 
 
 	 ' 	 S l o t   S l o t _ Z   =   L i m i t ( S l o t ( S l o t _ Z )   -   J o g S p e e d ,   Z m i n ,   Z m a x ) 
 
 	 ' E n d I f 
 
 	 ' 
 
 	 G o s u b   P r i n t V a l u e s 
 
 R e t u r n 
 
 
 
 
 
 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 '     P R I N T   C O O R D I N A T E S 
 
 '   = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 L a b e l   P r i n t V a l u e s 
 
 	 s 1   =   " " 
 
 	 s 1   =   s 1   +   "   C l a m p   1   =   "   +   F o r m a t ( S l o t ( S l o t _ D i g i C l a m p M 1 ) ,   " 0 . 0 0 0 " ) 
 
 	 S 1   =   S 1   +   "             " 
 
 	 s 1   =   s 1   +   "   C l a m p   2   =   "   +   F o r m a t ( S l o t ( S l o t _ D i g i C l a m p M 2 ) ,   " 0 . 0 0 0 " ) 
 
 	 P r i n t   s 1 
 
 R e t u r n 
 
 
 
 
 
 ' W A T C H   S l o t 
 
 ' W A T C H   S l o t 
 
 ' E X E C   S i n 2   =   S i n ( 3 3 ) 
 
 